home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PCMania 40
/
PCMania CD40_1.iso
/
render40
/
sastre
/
propio.inc
< prev
Wrap
Text File
|
1995-11-21
|
1KB
|
39 lines
#declare nada = colour red 1.0 green 1.0 blue 1.0 alpha 1.0
#declare blanco = colour red 1.0 green 1.0 blue 1.0
#declare rojo = colour red 1.0
#declare verde = colour green 1.0
#declare azul = colour blue 1.0
#declare amarillo = colour red 1.0 green 1.0
#declare cian = colour blue 1.0 green 1.0
#declare rosa = colour red 1.0 blue 1.0
#declare gris1 = color red .1 green .1 blue .1
#declare gris2 = color red .2 green .2 blue .2
#declare gris3 = color red .3 green .3 blue .3
#declare gris4 = color red .4 green .4 blue .4
#declare gris5 = color red .5 green .5 blue .5
#declare gris6 = color red .6 green .6 blue .6
#declare gris7 = color red .7 green .7 blue .7
#declare gris8 = color red .8 green .8 blue .8
#declare gris9 = color red .9 green .9 blue .9
#declare elipse = quadric { <1.0 1.0 1.0> <0.0 0.0 0.0> <0.0 0.0 0.0> -1.0 }
#declare cono = difference {
quadric { <1.0 -1.0 1.0> <0.0 0.0 0.0> <0.0 0.0 0.0> 0.0 }
plane { <0 -1 0> 0 }
plane { <0 1 0> -2 } translate <0 1 0> scale <.5 1 .5> }
#declare cilindro = difference {
quadric { <1.0 0.0 1.0> <0.0 0.0 0.0> <0.0 0.0 0.0> -1.0 }
plane { <0 -1 0> -1 }
plane { <0 1 0> -1 } }
#declare cono_abierto = difference {
difference { cono }
difference { cono translate <0 -.01 0> } }
#declare cilindro_abierto = difference {
difference { disco }
difference { disco scale <.99 1.01 .99> } }